From: Juri Linkov <juri@jurta.org>
Date: Thu, 2 Jul 2009 22:48:59 +0000 (+0000)
Subject: (tramp-gvfs-connection-mounted-p): Use `elt' instead of `mount-info'.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~324^2~11681
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=43023fc33a96ad2675ab8e19d3e7cbcd78335d45;p=emacs.git

(tramp-gvfs-connection-mounted-p): Use `elt' instead of `mount-info'.
---

diff --git a/lisp/net/tramp-gvfs.el b/lisp/net/tramp-gvfs.el
index e46727216d6..9241541a8e2 100644
--- a/lisp/net/tramp-gvfs.el
+++ b/lisp/net/tramp-gvfs.el
@@ -925,7 +925,7 @@ ADDRESS can have the form \"xx:xx:xx:xx:xx:xx\" or \"[xx:xx:xx:xx:xx:xx]\"."
 	 nil)
       ;; The interface of mount-info has been changed.  We must handle
       ;; both cases.
-      (let* ((last-nth (if (nth 9 mount-info) 9 8))
+      (let* ((last-nth (if (nth 9 elt) 9 8))
 	     (mount-spec (nth 1 (nth last-nth elt)))
 	     (method (dbus-byte-array-to-string
 		      (cadr (assoc "type" mount-spec))))